Code
install.packages("leaflet")
install.packages('sp')
install.packages('sf')
install.packages('tmap')
install.packages('leaflegend')install.packages("leaflet")
install.packages('sp')
install.packages('sf')
install.packages('tmap')
install.packages('leaflegend')library(leaflet)
library(sp)
library(sf)
library(tmap)
library(purrr)ez=st_make_valid(read_sf('ez'))
m=tm_shape(ez)
p=partial(tm_polygons,col="zonecode",popup.v=c("zonecode","zonename","SHAPE_Area"),al=0.7,style="cat",pal='Accent',border.a=0.1)
tmap_leaflet(m+p(legend.show=F))m+p(legend.is.p=F)+tm_layout(legend.on=T,legend.pos=c('center','top'))